clear all; close all;clc;
R=70.5;
L=100e-6;
tau=L/R;

f=10e7;
% Ось времени
T = 1 /10000/f;
t = 0:T:(200 * 1/f);
lt = length(t);

% Выделение памяти
Uv = nan(1, lt);

E=10*ones(1, lt);
Ur(1)=0;
i(1)=0;
di(1)=0;
Uv(1)=di(1)*L;

for k=2:lt

Uv(k)=(abs(E(k))+(tau/T)*Uv(k-1))/(tau/T+1);

end;


figure(1);
plot(t*1e9, [E;abs(E);Uv;]);
xlabel('t, ns')
ylabel('E, U, Volt')
legend('E(t|A=3)', 'U(t|A=3)', 'U(t|A=0)', 'U(t|A=1)', 'U(t|A=2)')
grid on

